This document presents an initial analysis of the household survey responses from invited residents living within three areas of Charlottesville and Albemarle County. The survey itself was constructed using Qualtrics and ESRI Survey 123—participants were recruited using mailed postcards and via email. The household survey response rate was lower than expected, despite compensation in the form of a $35 gift card as a financial incentive and we received 62 responses from 462 invitations for a response rate of 13.4% percent. Note: the effective response rate still needs to be calculated by taking into account the number of postcards that were “returned to sender” or marked as undeliverable by the US Postal Service.
However, only 54 of those 62 respondents completed the survey questionnaire to a degree that is useful for analysis.
Who Participated?
Although we did not collect any demographic information, we do know where the respondents live who provided a survey access code. The interactive map below shows the location of all respondents and of those who fully completed the survey questionnaire.
Of the 54 usable responses, 27 participants indicated that they would like an invitation to the follow-up focus group meeting:
10th and Page Neighborhood → 6
Fashion Square Mall and Branchlands Area → 9
Four Seasons Apartments and Townwood Mobile Home Park → 10
Michie Drive Subsidized Housing → 2
Perceptions of NbS and Barriers to Implementation
The first few questions ask about respondents’ familiarity with NbS concepts and terminology:
Are you familiar with any of these terms: nature-based solution (NbS), green infrastructure, best management practice (BMPs), or Low Impact Development (LID)?
Nature-based Solutions (NbS) are practices that weave natural features or processes into the built environment to promote adaptation and resilience.
Green infrastructure refers to measures that use plant or soil systems, permeable pavement or other permeable surfaces or substrates, stormwater harvest and reuse, or landscaping to store, infiltrate, or evapotranspirate stormwater and reduce flows to sewer systems or to surface waters.
Best management practices are techniques or methods that aim to manage the quantity and improve the quality of stormwater runoff in a cost-effective manner.
Low Impact Development (LID) refers to systems and practices that use or mimic natural processes that result in the infiltration, evapotranspiration, or use of stormwater to protect water quality and associated aquatic habitat.
Are you a homeowner, water resources professional, or industrial/commercial landowner?
Would it be possible for you to convert impervious/paved surfaces to grass, gardens, or trees on your property?
What are the major barriers that would prevent you from implementing NbS on your property, if any?
# Are you familiar with any of these terms...familiar_nbs <- recoded_data %>% dplyr::select(Neighborhood, Familiar_Terms) %>%group_by(Neighborhood) %>%tabyl(Neighborhood, Familiar_Terms) %>%`colnames<-`(c("Neighborhood", "No", "Yes")) %>%ggplot() +geom_bar(aes(y = Yes, x = Neighborhood), stat ="identity", fill ="green4", alpha =0.75) +labs(title ="Familiar With NbS Terminology", y ="", x ="") +scale_x_discrete(labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label = Yes, x = Neighborhood, y = Yes), vjust =1.8, color ="white", size =7)not_familiar_nbs <- recoded_data %>% dplyr::select(Neighborhood, Familiar_Terms) %>%group_by(Neighborhood) %>%tabyl(Neighborhood, Familiar_Terms) %>%`colnames<-`(c("Neighborhood", "No", "Yes")) %>%ggplot() +geom_bar(aes(y = No, x = Neighborhood), stat ="identity", fill ="#E57200", alpha =0.75) +labs(title ="Not Familiar With NbS Terminology", y ="", x ="") +scale_x_discrete(labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label = No, x = Neighborhood, y = No), vjust =1.8, color ="white", size =7)ggarrange(familiar_nbs, not_familiar_nbs)
# Are you a homeowner, water resources professional, or industrial/commercial landowner?kable( recoded_data %>%group_by(Role) %>%count() %>%as.data.frame() %>%`rownames<-`(c("None of These", "Homeowner", "Water Resources Professional")),col.names =c("Role", "Responses"))
Role
Responses
None of These
0
25
Homeowner
1
28
Water Resources Professional
2
1
recoded_data %>% dplyr::select(Neighborhood, Role) %>%group_by(Neighborhood) %>%tabyl(Neighborhood, Role) %>%`colnames<-`(c("Neighborhood", "None of These", "Homeowner", "Water Resources Professional")) %>%ggplot() +geom_bar(aes(y = Homeowner, x = Neighborhood), stat ="identity", fill ="dodgerblue", alpha =0.75) +labs(title ="I Am A Homeowner", y ="", x ="") +scale_x_discrete(labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label = Homeowner, x = Neighborhood, y = Homeowner), vjust =1.8, color ="white", size =7)
# Would it be possible for you to convert impervious/paved surfaces to grass, gardens, or trees on your property? # table(recoded_data$Convert_Impervious)ggplot(data = recoded_data) +geom_bar(aes(x =as_factor(Convert_Impervious)), stat ="count", fill ="yellow3", alpha =0.75) +labs(title ="Is It Possible For You to Convert Impervious Surfaces to Grass, \n Gardens, or Trees on Your Property?", y ="", x ="") +scale_x_discrete(labels =c("Other", "I am not sure", "Yes, but it would be difficult", "Yes, it would be possible")) +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label =after_stat(count), x =as_factor(Convert_Impervious)), vjust =1.8, color ="white", size =7, stat ="count")
# What are the major barriers that would prevent you from implementing NbS on your property, if any?barriers_in_order <-c("Cost_", "Uncertain_Benefits_", "Maintenance_and_Upkeep_", "Unanticipated_Impacts_", "Not_Enough_Space_", "other")NBS_Barriers_Top_3 %>%tabyl() %>%`colnames<-`(c("Barrier", "Number", "Percent")) %>%ggplot() +geom_bar(aes(y = Number, x =factor(Barrier, barriers_in_order)), stat="identity", fill ="#E57200", alpha =0.85) +scale_x_discrete(labels =c("Cost", "Uncertain Benefits", "Maintenance and Upkeep", "Unanticipated Impacts", "Not Enough Space", "Other"),name ="Barrier") +labs(title ="Frequency of Barriers in Top 3 Selections") +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label = Number, x = Barrier, y = Number), vjust =1.8, color ="white", size =7)
to_drop <-c("N/a", "N/A", "n/a")barriers_other <- data_1 %>%filter(is.na(`Other - What are the major barriers that would prevent you from implementing NbS on your property, if any?`) ==FALSE) %>% dplyr::select(`Other - What are the major barriers that would prevent you from implementing NbS on your property, if any?`, Neighborhood) %>%filter(!`Other - What are the major barriers that would prevent you from implementing NbS on your property, if any?`%in% to_drop)kbl(barriers_other %>%arrange(Neighborhood)) %>%kable_paper(bootstrap_options ="striped", full_width = F)
Other - What are the major barriers that would prevent you from implementing NbS on your property, if any?
Neighborhood
I don't know what this is
10th and Page Neighborhood
Not owner
10th and Page Neighborhood
not a home owner
10th and Page Neighborhood
An HOA that actively thwarts all positive environmental efforts. For example, no one is permitted any solar panels, and pollinator gardens are cited for being too messy.
Fashion Square Mall and Branchlands Area
HOA approval (lack of)
Fashion Square Mall and Branchlands Area
I own a townhouse but not the land it sits on. My native plants were cut back last fall without my permission. The two young oak trees were left alone.
Fashion Square Mall and Branchlands Area
I live in a property owner's association so the Board and possible a majority of owners would have to approve
Fashion Square Mall and Branchlands Area
Do not own property
Fashion Square Mall and Branchlands Area
I live in a condo
Fashion Square Mall and Branchlands Area
My home is a condo townhouse so the HOA owns all the exterior pavement trees etc so it would take HOA to do Nbs for the whole neighborhood
Fashion Square Mall and Branchlands Area
The HOA has denied prior plan that my sister (the homeowner) and I submitted that included NbS
Four Seasons Apartments and Townwood Mobile Home Park
HOA restrictions
Four Seasons Apartments and Townwood Mobile Home Park
Potential HOA restrictions
Four Seasons Apartments and Townwood Mobile Home Park
Lease agreement
Four Seasons Apartments and Townwood Mobile Home Park
Home Association Rules and Guidelines
Four Seasons Apartments and Townwood Mobile Home Park
I do not own any property
Michie Drive Subsidized Housing
The overwhelming majority of respondents identified as homeowners (28 of 54) and the percentage of respondents who were familiar with NbS terminology lived in the Fashion Square Mall and Branchlands Area (i.e., 12 of 14). Familiarity with NbS terminology was lowest among 10th and Page respondents (i.e., 9 of 14). The implication is that 26 of the respondents are renters.
A majority of respondents were unsure or doubtful (33 of 54) of their ability to convert existing impervious surfaces on their property with cost and other factors (see the table) like HOA restrictions most frequently cited.
NbS Priorities and Community Concerns
Two of the survey questions ask respondents to rank the benefits associated with a list of NbS interventions that this project considers and to identify related environmental impacts that are of most concern.
Please rank each of the benefits associated with NbS listed below in terms of their importance to you on a scale from 1 to 8 with 1 indicating the most important:
Air quality improvements
Enhanced landscape aesthetics
Environmental education opportunities
Increased habitat for native plants and animals
Recreational opportunities
Stormwater runoff and flooding mitigation
Urban heat island attenuation
Water supply
Which of the following would you say is of greatest concern to your community?
Air pollution
Flooding/stormwater management
Urban heat
Water quality
# Please rank each of the benefits associated with NbS listed below in terms of their importanceNBS_Import_Top_3 %>%tabyl() %>%`colnames<-`(c("Benefit", "Number", "Percent")) %>%ggplot() +geom_bar(aes(y = Number, x = Benefit), stat="identity", fill ="dodgerblue", alpha =0.75) +scale_x_discrete(labels =c("Air Quality \n Improvements", "Enhanced Landscape \n Aesthetics", "Environmental Education \n Opportunities", "Increased Habitat \n for Native Plants \n and Animals", "Recreational \n Opportunities", "Stormwater Runoff \n and Flooding Mitigation","Urban Heat \n Island Attenuation", "Water Supply" ), name ="Benefit") +labs(title ="Frequency of Benefits in Top 3 Selections") +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label = Number, x = Benefit, y = Number), vjust =1.8, color ="white", size =7)
# Which of the following would you say is of greatest concern to your communityNBS_Greatest_Concern %>%tabyl() %>%`colnames<-`(c("Concern", "Number", "Percent")) %>%ggplot() +geom_bar(aes(y = Number, x = Concern), stat="identity", fill ="green4", alpha =0.75) +scale_x_discrete(labels =c("Air Pollution", "Flooding/Stormwater \n Management", "Urban Heat", "Water Quality" ), name ="Concern") +labs(title ="Frequency of Greatest Concern") +theme_minimal() +theme(plot.title =element_text(hjust =0.5, size =16), axis.text.x =element_text(size =12),text =element_text(size =18)) +geom_text(aes(label = Number, x = Concern, y = Number), vjust =1.8, color ="white", size =7)
Stormwater runoff and flood mitigation benefits were most frequently cited NbS benefits in terms of their importance. Similarly, most respondents identified flood and stormwater management followed y water quality as the greatest concern where they live.
Perceptions of Individual NbS Interventions
There are several sets of questions designed to capture respondent perceptions of the five NbS interventions this project has considered—rain gardens, green roofs, green spaces (e.g., parks and fields), stormwater retention ponds, and tree planting. For each of these interventions there is a Likert scale question that asks about that intervention’s capacity to enhance local water supplies, recreational opportunities, habitat for native plants/animals, to beautify the landscape, and to help prevent flooding.
For each of these responses a higher represents a more positive perception of that NbS and its capacity to deliver the benefit in question. These questions are all coded 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree and an example suite of these questions is given below:
Do you agree with the statement: “Rain gardens can enhance local water supplies.”?
Do you agree with the statement: “Rain gardens can enhance recreational/hobby opportunities.”?
Do you agree with the statement: “Rain gardens can increase habitat for native plants and animals.”?
Do you agree with the statement: “Rain gardens can enhance the beautification of the landscape.”?
Do you agree with the statement: “Rain gardens can help control stormwater runoff and can help prevent flooding.”?
In addition to selected descriptive statistics, we use non-parametric Kruskal-Wallis tests to explore potential differences in outcomes of interest. Note that the null hypothesis for the Kruskal-Wallis test is that the median values of the variable of interest are the same across the groups being compared—this test is useful when the data are not normally distributed or when they are ordinal (e.g., Likert scales).
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Rain_Garden_Habitat, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Rain Garden Habitat Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
There are no statistically significant differences in any of the questions related to perceived benefits of rain gardens across neighborhoods based on the Kruskal-Wallis and Wilcox tests.
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Green_Roof_Habitat, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Green Roof Habitat Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Green_Roof_Beautify, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Green Roof Beautification Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
There are statistically significant differences (0.05 alpha level) for two questions related to perceived benefits of green roofs across neighborhoods.
For the Green roofs can increase habitat for native plants and animals question (kw = 8.24, p = 0.041) respondents from the Michie Drive area agreed most strongly while respondents from 10th and Page were most neutral. The Wilcox test did not corroborate this though.
For the Green roofs can enhance the beautification of the landscape question (kw = 9.10, p = 0.028) respondents from the Michie Drive area agreed most strongly while respondents from 10th and Page were most neutral. The Wilcox test confirms a significant difference between 10th and Page responses and those from the Four Seasons Apartments and Townwood Mobile Home Park.
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Parks_Fields_Water_Supplies, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Green Space Water Supplies Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Parks_Fields_Prevent_Flooding, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Green Space Flood Prevention Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
There are statistically significant differences (0.05 alpha level) for two questions related to perceived benefits of green space across neighborhoods.
For the Green space such as fields and parks can enhance local water supplies question (kw = 12.0, p = 0.007) respondents from the Fashion Square Mall and Branchlands Area agreed most strongly while respondents from Michie Drive were most neutral. The Wilcox test confirms a significant difference between 10th and Page responses and those from the Fashion Square Mall and Branchlands Area.
For the Green space such as fields and parks can help control stormwater runoff and can help prevent flooding question (kw = 8.62, p = 0.035) respondents from the Fashion Square Mall and Branchlands Area agreed most strongly while respondents from 10th and Page were most neutral. The Wilcox test confirms a significant difference between 10th and Page responses and those from the Fashion Square Mall and Branchlands Area.
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Retention_Ponds_Water_Supplies, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Stormwater Retention Pond Water Supply Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Retention_Ponds_Prevent_Flooding, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Stormwater Retention Pond Flood Prevention Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
There are statistically significant differences (0.05 alpha level) for two questions related to perceived benefits of stormwater retention ponds across neighborhoods.
For the Stormwater retention ponds can enhance local water supplies. question (kw = 17.1, p = 0.001) respondents from the Fashion Square Mall and Branchlands Area agreed most strongly while respondents from 10th and Page were most neutral. The Wilcox test confirms a significant difference between 10th and Page responses and those from the Fashion Square Mall and Branchlands Area as well as between the Fashion Square Mall and Branchlands Area and the Four Seasons Apartments and Townwood Mobile Home Park.
For the Stormwater retention ponds can help control stormwater runoff and can help prevent flooding question (kw = 13.9, p = 0.003) respondents from the Fashion Square Mall and Branchlands Area agreed most strongly while respondents from 10th and Page were most neutral. The Wilcox test confirms a significant difference between 10th and Page responses and those from both the Four Seasons Apartments and Townwood Mobile Home Park and the Fashion Square Mall and Branchlands Area.
recoded_data %>%group_by(Neighborhood) %>% dplyr::select(Tree_Planting_Water_Supplies, Neighborhood) %>% rstatix::get_summary_stats(type ="common") %>%ggplot() +geom_bar(aes(x = Neighborhood, y = mean, fill = Neighborhood), stat ="identity", alpha =0.6) +scale_fill_manual(name ="", values =c("#440154FF", "dodgerblue", "#E57200", "#B8DE29FF"), labels =c("10th and Page \n Neighborhood", "Fashion Square Mall \n and Branchlands Area","Four Seasons Apartments \n and Townwood Mobile \n Home Park", "Michie Drive \n Subsidized Housing")) +labs(x =" ", y ="Mean", title ="Perceptions of Tree Planting Water Supply Benefits", subtitle ="", caption ="Note: 1 = Strongly Disagree, 2 = Disagree, 3 = Neutral, 4 = Agree, 5 = Strongly Agree") +theme_minimal() +theme(legend.position="bottom",plot.subtitle =element_text(hjust =0.5), plot.title =element_text(hjust =0.5, size =16), axis.text.y =element_text(size =12),plot.caption =element_text(size =9),text =element_text(size =14)) +geom_text(aes(label =round(mean, 2), x = Neighborhood, y = mean), vjust =1.8, color ="white", size =7)
There are statistically significant differences (0.05 alpha level) for two questions related to perceived benefits of tree planting across neighborhoods.
For the Planting more trees can enhance local water supplies question (kw = 11.8, p = 0.008) respondents from the Fashion Square Mall and Branchlands Area agreed most strongly while respondents from Michie Drive and 10th and Page were most neutral. The Wilcox test confirms a significant difference between 10th and Page responses and those from the Fashion Square Mall and Branchlands Area.
NbS Intervention Preferences
Two questions explore respondents preferences for NbS interventions where they live:
Which type of NbS element would you prefer to see more of in your community?
List any location(s) you think should be prioritized for NbS investments in future?
The responses to these questions are presented below.
# List any location(s) you think should be prioritized for NbS investmentsto_drop <-c("N/a", "N/A", "n/a")nbs_priority_locations <- data_1 %>%filter(is.na(`List any location(s) you think should be prioritized for NbS investments in future?`) ==FALSE) %>% dplyr::select(`List any location(s) you think should be prioritized for NbS investments in future?`, Neighborhood) %>%filter(!`List any location(s) you think should be prioritized for NbS investments in future?`%in% to_drop)kbl(nbs_priority_locations %>%arrange(Neighborhood)) %>%kable_paper(bootstrap_options ="striped", full_width = F)
List any location(s) you think should be prioritized for NbS investments in future?
Neighborhood
New Orleans
10th and Page Neighborhood
Prospect Ave
10th and Page Neighborhood
10th & Page neighborhood
10th and Page Neighborhood
Places on UVA grounds around newcomb. The UVA corner always has significant flooding
10th and Page Neighborhood
Branchlands development, where I live, could benefit greatly from a porous pavement. Instead, they "sealcoat" it with a toxic tar far too frequently
Fashion Square Mall and Branchlands Area
area around the fashion square mall (where I live)
Fashion Square Mall and Branchlands Area
Charlottesville Inner city and new developments
Fashion Square Mall and Branchlands Area
If my neighborhood HOA got a grant to put in a rain garden I think a lot of my neighbors would like it.
Fashion Square Mall and Branchlands Area
Greenbriar
Fashion Square Mall and Branchlands Area
Medical school, North Charlottesville
Fashion Square Mall and Branchlands Area
city of Charlottesville
Four Seasons Apartments and Townwood Mobile Home Park
Belmont
Four Seasons Apartments and Townwood Mobile Home Park
Pond on Hillsdale and Greenbrier and along Meadowcreek Trail via Rivanna Trail Foundation
Four Seasons Apartments and Townwood Mobile Home Park
Stonefield Commons and the surrounding highway area
Four Seasons Apartments and Townwood Mobile Home Park
Commonwealth/ Four Seasons
Four Seasons Apartments and Townwood Mobile Home Park
The commonwealth neighborhood in Charlottesville
Four Seasons Apartments and Townwood Mobile Home Park
Many locations in the Rivanna watershed
Four Seasons Apartments and Townwood Mobile Home Park
Charlottesville
Four Seasons Apartments and Townwood Mobile Home Park
Four Seasons
Four Seasons Apartments and Townwood Mobile Home Park
low income communities
Four Seasons Apartments and Townwood Mobile Home Park
White House
Four Seasons Apartments and Townwood Mobile Home Park
Common area used as play space for kids
Four Seasons Apartments and Townwood Mobile Home Park
Four Seasons
Four Seasons Apartments and Townwood Mobile Home Park
Charlottesville along the highway 29 corridor north of town is largely blighted. Near my development there are two large parking lots for shopping centers that are mostly or entirely abandoned buildings. No greenery, impermeable surfaces everywhere.
Michie Drive Subsidized Housing
The most common desired NbS intervention was rain gardens, followed by stormwater retention ponds and tree planting. The open-ended responses to the question of where those interventions should be made range from very specific (e.g., “Pond on Hillsdale and Greenbrier and along Meadowcreek Trail via Rivanna Trail Foundation” to very vague (e.g., “New Orleans” and “city of Charlottesville”).
Next steps include exploring the polygons drawn by respondents to this survey that show areas that they believe:
Are subject to flooding
Are exposed to extreme heat
Have compromised air quality
Have compromised water quality
On a final note—the response rate from the Michie Drive study area has been very low (3/33) at 9.1%. We have email addressed for 10 of these individuals I will write to them directly this week to encourage them to participate.
10th and Page Neighborhood → (15/117) → 12.8%
Fashion Square Mall and Branchlands Area → (18/162) → 11.1%
Four Seasons Apartments and Townwood Mobile Home Park → (26/150) → 17.3%